home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 February
/
EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso
/
earcd
/
program
/
palis.lha
/
Palis
/
src
/
vpl
/
Gui.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-09-02
|
2KB
|
125 lines
/*
·C·O·D·E·X· ·D·E·S·I·G·N· ·S·O·F·T·W·A·R·E·
presents
PatchLibraries Utility / VIEW
FILE: gui.c
TASK: window control
(c)1995 by Hans Bühler, h0348kil@rz.hu-berlin.de
*/
#include "plView.h"
// ---------------------------
// defines
// ---------------------------
// ---------------------------
// datatypes
// ---------------------------
// ---------------------------
// proto
// ---------------------------
// ---------------------------
// vars
// ---------------------------
// ---------------------------
// funx: basic
// ---------------------------
BOOL OpenWin(void)
{
if(MainWnd)
{
SetActiveList(LIST_PALIS);
return TRUE;
}
if(!InitLists())
return FALSE;
if(!SetupScreen())
{
MainLeft = ttGetInt(&tt[ARG_WINX]);
MainTop = ttGetInt(&tt[ARG_WINY]);
if(!OpenMainWindow())
{
SetActiveList(LIST_PALIS);
return TRUE;
}
CloseMainWindow();
}
CloseDownScreen();
DisplayBeep(0);
return FALSE;
}
// ---------------------------
void CloseWin(void)
{
if(MainWnd)
{
ttSetInt(&tt[ARG_WINX],MainWnd->LeftEdge);
ttSetInt(&tt[ARG_WINY],MainWnd->TopEdge);
}
CloseMainWindow();
CloseDownScreen();
RemLists();
}
// ---------------------------
// funx: basic
// ---------------------------
int GadListClicked( void )
{
return CMD_OKAY;
}
// ---------------------------
int GadUpDateClicked( void )
{
SetActiveList(LIST_PALIS); // force REFRESH to show PALIS jobs
return CMD_REFRESH;
}
// ---------------------------
int GadAboutClicked( void )
{
SetActiveList(LIST_ABOUT);
return CMD_REFRESH;
}
// ---------------------------
int GadCloseClicked( void )
{
return CMD_QUIT;
}
// ---------------------------
int GadHideClicked( void )
{
return CMD_HIDE;
}
// ---------------------------
int MainCloseWindow(void)
{
return CMD_HIDE;
}